<%@LANGUAGE="VBSCRIPT" %> <% dim el_numarasi el_numarasi=0 If (Request.QueryString("el_no") <> "") Then el_numarasi = Request.QueryString("el_no") End If %> <% Dim rsel_detay Dim rsel_detay_numRows Dim Baglanti Dim IsKayit Dim Sql Dim VeriTabani VeriTabani = Server.MapPath("../../db/javac@.mdb") Set Baglanti = Server.CreateObject("ADODB.Connection") Baglanti.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & VeriTabani Set rsel_detay = Server.CreateObject("ADODB.Recordset") Sql = "Select * from elemenarayan where el_no=" & el_numarasi rsel_detay.Open Sql,Baglanti,1,3 rsel_detay_numRows = 0 %> Detay Eleman İlanlari www.beyoglubeyoglu.com <%if not rsel_detay.EOF then %>
MESLEK
<%=(rsel_detay.Fields.Item("meslek").Value)%> - <%=(rsel_detay.Fields.Item("brans").Value)%>
EĞİTİM <%=(rsel_detay.Fields.Item("egitim").Value)%> 
TECRÜBE <%=(rsel_detay.Fields.Item("tecrube").Value)%> 
YAŞ <%=(rsel_detay.Fields.Item("yas").Value)%> 
CİNSİYET <%=(rsel_detay.Fields.Item("cinsiyet").Value)%> 
İL <%=(rsel_detay.Fields.Item("il").Value)%> 
ÖZELLİKLER <%=(rsel_detay.Fields.Item("ozellik").Value)%> 
FİRMA <%=(rsel_detay.Fields.Item("firma").Value)%> 
YETKİLİ <%=(rsel_detay.Fields.Item("yetkili").Value)%> 
ADRES <%=(rsel_detay.Fields.Item("adres").Value)%> 
TELEFON <%=(rsel_detay.Fields.Item("tel").Value)%> 
FAX <%=(rsel_detay.Fields.Item("fax").Value)%> 
EMAİL <%=(rsel_detay.Fields.Item("e_posta").Value)%> 
<%end if%>

<<--GERİ| ANASAYFA | İŞ & ELEMAN İLANLARI |

 

<% rsel_detay.Close() Set rsel_detay = Nothing Baglanti.Close() Set Baglanti = Nothing %>